home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 06 - 1990 / 06.07 Jul 90 / Commando Programming ƒ / Rezscripts / RezC.MENU1.more.Cmdo.R < prev    next >
Encoding:
Text File  |  1988-07-29  |  3.5 KB  |  145 lines  |  [TEXT/MPS ]
  1. /* File RezC.MENU1.more.Cmdo.R */ 
  2. /* Commando interface to build MENU Rez input */
  3. /* W. Powell 1988 */
  4.  
  5. /* Rez definitions for Rez-building Commando interfaces */
  6. #include "Types.R"
  7. #include "Cmdo.R"
  8.  
  9. Resource 'cmdo' (200) {
  10.     { 295,
  11.     "RezC.MENU1 produces Rez input for one item in a "
  12.     "MENU resource.\n"
  13.     "NOTE: Input of menu items continues in subsequent dialogs.",
  14.     {
  15. /* other items particular to this case */    
  16.     /* Item 1 */
  17.     OR {{-((3<<12)+16)}}, RegularEntry {
  18.         "Item Text:",
  19.         {25,30,41,110},
  20.         {25,115,41,430},
  21.         "",keepCase,"",
  22.         "Text of menu item." },
  23.     /* Item 2 */
  24.     OR {{1}}, RegularEntry {
  25.         "Icon #",
  26.         {50,40,66,90},{69,40,85,90},
  27.         "",keepCase,"-icon",
  28.         "Index number for icon.\nIndex = [ICON ID #] - 256" },
  29.     /* Item 3 */
  30.     AND {{1,-4}}, RegularEntry {
  31.         "-Key",
  32.         {50,130,66,180},{69,130,85,180},
  33.         "",keepCase,"-key",
  34.         "Command key equivalent." },
  35.     /* Item 4 */
  36.     OR {{1}}, CheckOption {
  37.         NotSet,{125,80,141,220},
  38.         "Hierarchical Menu","hierarchicalMenu",
  39.         "Check here if item is a hierarchical menu."} ; 
  40.         
  41.     /* Item 5 */
  42.     AND {{1,-6,-4}}, RegularEntry {
  43.         "Mark",
  44.         {50,220,66,270},{69,220,85,270},
  45.         "",keepCase,"-mark",
  46.         "Mark the item with this character.\nClick the "
  47.         "“Check” item to mark with a check." }, 
  48.     /* Item 6 */
  49.     AND {{1,-4}}, CheckOption {
  50.         NotSet,{90,215,106,277},
  51.         "Check","-mark check","Mark item with check." }, 
  52.     /* Item 7 */
  53.     OR {{4}}, RegularEntry {
  54.         "SubMenu ID:",
  55.         {125,250,141,350},
  56.         {125,355,141,405},
  57.         "",keepCase,"-sub",
  58.         "Resource ID of Hierarchical submenu." }, 
  59.     /* Item 8 */
  60.     OR {{1}}, NestedDialog {
  61.         2,    /* Dialog number */
  62.         {57,303,75,353},
  63.         "Style" ,
  64.         "Select type style for item’s text."},
  65.     /* Item 9 */
  66.     OR {{1}}, RadioButtons {{
  67.         {67,380,83,455},
  68.             "Enabled","enabled",NotSet,"Menu item is initially enabled.",
  69.         {83,380,99,455},
  70.             "Disabled","disabled",NotSet,"Menu item is initially disabled."
  71.         }},
  72.     /* Item 10 */ 
  73.     NotDependent {}, TextBox {
  74.         gray, {57,375,104,460},"Item is:" },
  75.     /* Item 11 */
  76.     AND {{4,7}}, Dummy {}, 
  77.     /* Item 12 */ 
  78.     OR {{-4,11}}, Dummy {},
  79.     /* Item 13 */
  80.     AND { {1,12} }, Dummy {},
  81.     /* Item 14 */
  82.     OR {{13,(3<<12)+16}}, DoItButton {}, 
  83.     /* Item 15 */
  84.     NotDependent {}, Box {
  85.         gray, {117,45,149,435} }, 
  86.     /* Item 16 */
  87.     NotDependent {}, RadioButtons {{
  88.         {162,105,178,160},
  89.             "More items","-OK",NotSet,
  90.             "Continue prompting for items with more dialogs.",
  91.         {162,185,178,270},
  92.             "Last item","-LAST",NotSet,
  93.             "This is the last item on the menu.  "
  94.             "Don’t need to prompt for more.",
  95.         {162,295,178,345},
  96.             "Done","-DONE",NotSet,
  97.             "Previous string was the last.  Ignore any "
  98.             "input in this dialog." 
  99.         }},
  100.     /* Item 17 */
  101.     NotDependent {}, Box {
  102.         black, {159,90,181,390} },
  103.     
  104.     }, 
  105. /* Dialog 2 */
  106.     205,
  107.     "Text style for menu item.",
  108.     {
  109.     /* Item 1 is hidden */
  110.     AND {{-3,-4,-5,-6,-7,-8,-9}}, RadioButtons {{ 
  111.         {30,1000,50,1001},
  112.             "","plain",NotSet,"" }}, 
  113.     /* Item 2 */
  114.     NotDependent {}, CheckOption {
  115.         Set,{20,100,36,200},
  116.         "Plain","",""},
  117.     OR {{-2}}, CheckOption {
  118.         NotSet,{36,100,52,200},
  119.         "Bold","∂∂∂+ bold",""},
  120.     OR {{-2}}, CheckOption {
  121.         NotSet,{52,100,68,200},
  122.         "Italic","∂∂∂+ italic",""},
  123.     OR {{-2}}, CheckOption {
  124.         NotSet,{68,100,84,200},
  125.         "Underline","∂∂∂+ underline",""},
  126.         
  127.     OR {{-2}}, CheckOption {
  128.         NotSet,{20,280,36,380},
  129.         "Outline","∂∂∂+ outline",""},
  130.     OR {{-2}}, CheckOption {
  131.         NotSet,{36,280,52,380},
  132.         "Shadow","∂∂∂+ shadow",""},
  133.     OR {{-2}}, CheckOption {
  134.         NotSet,{52,280,68,380},
  135.         "Condense","∂∂∂+ condense",""},
  136.     OR {{-2}}, CheckOption {
  137.         NotSet,{68,280,84,380},
  138.         "Extend","∂∂∂+ extend",""},
  139.     }, 
  140. }
  141. }; 
  142.  
  143. /* End File RezC.MENU1.more.Cmdo.R */
  144.  
  145.